Option Explicit
Sub D_Sample021()
    Dim mySht As Worksheet
    Set mySht = Worksheets(1)				'Nu@
    'ǳƨ즹
    If Sheets.Count > 1 Then
        Application.DisplayAlerts = False
        mySht.Delete
        Application.DisplayAlerts = True
    Else
    MsgBox "oO̫@iu@AҥHLkRC"
    End If
    Set mySht = Nothing						'
End Sub

